(fortran-electric-line-number): Add delete-selection property.

diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index c35eadda156064fae6a7791ccd03455961bfd932..ea537f011d84d7f91912fd524b1c5a5198f4099b 100644 (file)
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -853,6 +853,7 @@ except that ] is never special and \ quotes ^, - or \."
   (skip-chars-backward chars)
   (delete-region (point) (progn (skip-chars-forward chars) (point))))
 
+(put 'fortran-electric-line-number 'delete-selection t)
 (defun fortran-electric-line-number (arg)
   "Self insert, but if part of a Fortran line number indent it automatically.
 Auto-indent does not happen if a numeric ARG is used."